home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 23 / CU Amiga - Super CD-ROM 23 (June 1998).iso / CreatingGames / Utilities / C / MUI-Dev / ExtClasses / MCC_Tron / Developer / Oberon / txt / mccTron.mod
Encoding:
Text File  |  1996-12-22  |  1.5 KB  |  77 lines
  1.  
  2. (**********************************************************************
  3. :Program.       mccTron.mod
  4. :Contents.      Oberon 2 Modul for Tron.mcc
  5. :Contents.      Registered class of the Magic User Interface.
  6. :Author.        Klaus Melchior [kmel]
  7. :Email.         kmel@eifel.tng.oche.de
  8. :Help.          Frank Duerring [fjd]    (Oberon Modul)
  9. :Email.         fd@marvin.unterland.de
  10. :Copyright.     Klaus Melchior [kmel]
  11. :Language.      Oberon 2
  12. :Translator.    AmigaOberon v3.20d
  13. :History.       [kmel] 28-Aug-1996 : PrMake generates this
  14. ***********************************************************************)
  15.  
  16. MODULE mccTron;
  17.  
  18. IMPORT Mui,
  19.        MuiBasics,
  20.        Utility,
  21.        SYSTEM,
  22.        Exec;
  23.  
  24.  
  25. (*** Methods ***)
  26.  
  27.   CONST mTronDemo           * = 8002000BH;
  28.  
  29.  
  30. (*** Method structs ***)
  31.  
  32.   TYPE
  33.   pTronDemoPtr * = POINTER TO pTronDemo;
  34.   pTronDemo    * = STRUCT
  35.     MethodID   * : LONGINT;
  36.   END;
  37.  
  38.  
  39. (*** Special method values ***)
  40.  
  41.   CONST vTronDemoSimple                 * =   0;
  42.  
  43.  
  44. (*** Special method flags ***)
  45.  
  46.  
  47.  
  48. (*** Attributes ***)
  49.  
  50.   CONST aTronRunning        * = 80020040H;
  51.  
  52.  
  53. (*** Special attribute values ***)
  54.  
  55.  
  56.  
  57. (*** Stuff ***)
  58.  
  59.   CONST cTron * = "Tron.mcc";
  60.  
  61.  
  62.  
  63.  
  64.  
  65. VAR
  66.  
  67.   PROCEDURE mccTronObject*{"mccTron.mccTronObjectA"} ( tags{9}.. : Utility.Tag);
  68.   PROCEDURE mccTronObjectA*( tags{9} : Utility.TagListPtr );
  69.     BEGIN
  70.       MuiBasics.NewObjectA( SYSTEM.ADR(cTron), tags );
  71.     END mccTronObjectA;
  72.  
  73. END mccTron.
  74.  
  75. (* PrMake.rexx 0.10 (16.2.1996) Copyright 1995 kmel, Klaus Melchior *)
  76.  
  77.